home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The Ultimate Frank Lloyd…ght - America's Architect
/
Ultimate Frank Lloyd Wright, The - America's Architect (1994)(Microsoft Home).iso
/
pre
/
flw
/
flwdel.dir
/
00279_Script_279
< prev
next >
Wrap
Text File
|
1994-11-15
|
3KB
|
132 lines
on startMovie
global nowFrame
global horNess, currMM, dialogOn
set dialogOn = FALSE
set currMM = "FLWWW"
puppetSprite 22, TRUE
puppetSprite 23, TRUE
puppetSprite 21, TRUE
set the immediate of sprite 23 to TRUE
set the stretch of sprite 23 to FALSE
repeat with i = 12 to 16
puppetSprite i, TRUE
set the immediate of sprite i to TRUE
end repeat
end startMovie
on stepMovie
global nowFrame,currFrame
if nowFrame <> currFrame then
seeAlsoList
set currFrame = nowFrame
end if
end stepMovie
on stopMovie
set the castNum of sprite 21 to 1050
puppetSprite 21, FALSE
put " " into field "SeeAlsoText"
updateStage
end stopMovie
on saveLocals
global lastFrame, nowFrame, lastMovie
set lastFrame = nowFrame
set lastMovie = "FLWDEL"
end saveLocals
on buttonState
global FrankNav, dialogOn
global bflag, noTx
if dialogOn = FALSE then
sectionCheck
-- don't check global buttons unless mouse is down at bottom
if (the mouseV > 200) or (bFlag = TRUE) then
doState
set bFlag = FALSE
end if
else if dialogOn = TRUE then
if the mouseDown then
if the mouseCast <> the number of cast "glossDialog" then
beep
end if
end if
end if
end buttonState
on deBackStep
global nowFrame
puppetSprite 6, FALSE
if nowFrame = "de000lig001°°°" then
go to frame "de000acc030°°°" of movie "FLWDEA"
else
go to marker (- 1)
end if
end deBackStep
on deForStep
global nowFrame
puppetSprite 6, FALSE
if nowFrame = "de000lig018°°°" then
go to frame "de000fur001°°°" of movie "FLWDEF"
else
go to marker (+ 1)
end if
end deForStep
on sectionCheck
global dialogOn
if dialogOn = FALSE then
if rollover(12) then
set the castNum of sprite 12 to A34
else
set the castNum of sprite 12 to A18
end if
if rollover(14) then
set the castNum of sprite 14 to A31
else
set the castNum of sprite 14 to A15
end if
if rollover(15) then
set the castNum of sprite 15 to A32
else
set the castNum of sprite 15 to A16
end if
if rollover(16) then
set the castNum of sprite 16 to A33
else
set the castNum of sprite 16 to A17
end if
updateStage
end if
end sectionCheck
on textRoll txHt
global origLocV, topHat, dialogOn, SeeAlsoBox
if dialogOn = FALSE and SeeAlsoBox = FALSE then
set topHat = txHt + (the height of sprite 6 / 2)
if the width of sprite 6 > 300 then
if the mouseH > 229 and the mouseV > 363 and the mouseV < 431 then
set the locV of sprite 6 to topHat
else if (the mouseH > 610) or (the mouseH < 229) or (the mouseV > 431) or (the mouseV < txHt) then
set the locV of sprite 6 to 485
end if
else
if the mouseH > 414 and the mouseV > 363 and the mouseV < 431 then
set the locV of sprite 6 to topHat
else if the mouseH > 610 or the mouseH < 414 or the mouseV > 431 or the mouseV < txHt then
set the locV of sprite 6 to 549
end if
end if
end if
end textRoll